home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48hor2 / air6.src < prev    next >
Text File  |  1992-01-11  |  2KB  |  68 lines
  1. %%HP: T(3)A(D)F(.);
  2. @ Sample AIR directory for use with FLYING.LIB
  3. DIR
  4.   PLANES
  5.     DIR
  6.       N26H
  7.         \<<
  8. 'PPIPARCH'
  9. 'PIPARCH' {
  10. ":Gal Per Hr:10.0
  11. :TAS:125
  12. :Base Wt:1601
  13. :Base Mom:140.806"
  14. { -1 0 } V }
  15.         \>>
  16.       PPIPARCH
  17.         \<< ERASE {
  18. (81.0000000004,1200)
  19. (94.0000000004,2600)
  20. X 0 {
  21. (81.0000000004,1200)
  22. "C.G.(aft.datum)"
  23. "WT" } FUNCTION Y }
  24. 'PPAR' STO DRAX
  25. LABEL
  26. (81.9999999998,1200)
  27. (92.9999999989,1200)
  28. LINE
  29. (92.9999999989,1200)
  30. (92.9999999999,2550)
  31. LINE
  32. (92.9999999999,2550)
  33. (88.5000000017,2550)
  34. LINE
  35. (88.5000000017,2550)
  36. (81.9999999984,2050)
  37. LINE
  38. (81.9999999984,2050)
  39. (81.9999999998,1200)
  40. LINE MOMT WGHT /
  41. 1000 * .1 - WGHT 10
  42. - R\->C MOMT WGHT /
  43. 1000 * .1 + WGHT 10
  44. + R\->C BOX { # 0d
  45. # 0d } PVIEW
  46.         \>>
  47.       PIPARCH
  48.         \<< WGHT fpwt
  49. + rpwt + b1wt +
  50. b2wt + gal 6 * +
  51. 'WGHT' STO MOMT
  52. fpwt 32.5 401 / * +
  53. rpwt 38 325 / * +
  54. gal 6 * 29 300 / *
  55. + b1wt 27.5 199 / *
  56. + b2wt 100 1 / * +
  57. 'MOMT' STO { b1wt
  58. b2wt rpwt fpwt }
  59. PURGE
  60.         \>>
  61.       sst.p
  62. "C# 588 0400038000FF0FF0890E0EB0C172AF080C97290E0280888222080888290E0280880222080888290E0280880222080888290E0E90880E32080887290E028088C222080888290E0280888222080888290E0280888222080888290E028FC1F22208FC97FF0FF0CE020C41E9020451E9010C8F901049F9010C8AF0F088C17E37E17C10E1190788482600220002D807088880888482200221907088880888482B00227C33C97C38807188880888E12E302A82022A82A80715880888A022202AFC122A8C19807158808882122202A0022CB802980002588482B002A00220A802980712C17807227220E17E170A8E1C9010C17D080E00807C1289080110C88223790908E2088822279090822080FC32790908E208080228908011080401289080E00C13C07FF0FF00E0"
  63.     END
  64.   RTE.FILES
  65.     DIR
  66.     END
  67. END
  68.